home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 1994 January / ARPL-Jan94-Disc1of2-Partner-Edition.iso / ARPL Info Center 1⁄94 Partner / ARPL Info Center 1_94 Partner / background_2663.xml next >
Encoding:
Extensible Markup Language  |  1993-12-18  |  8.8 KB  |  199 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>2663</id>
  5.     <filler1>0</filler1>
  6.     <cantDelete> <true /> </cantDelete>
  7.     <showPict> <true /> </showPict>
  8.     <dontSearch> <false /> </dontSearch>
  9.     <link rel="stylesheet" type="text/css" href="stylesheet_3119.css" />
  10.     <part>
  11.         <id>1</id>
  12.         <type>button</type>
  13.         <visible> <true /> </visible>
  14.         <reserved5> 0 </reserved5>
  15.         <reserved4> 0 </reserved4>
  16.         <reserved3> 0 </reserved3>
  17.         <reserved2> 0 </reserved2>
  18.         <reserved1> 0 </reserved1>
  19.         <enabled> <true /> </enabled>
  20.         <rect>
  21.             <left>16</left>
  22.             <top>434</top>
  23.             <right>94</right>
  24.             <bottom>465</bottom>
  25.         </rect>
  26.         <style>transparent</style>
  27.         <showName> <false /> </showName>
  28.         <highlight> <false /> </highlight>
  29.         <autoHighlight> <true /> </autoHighlight>
  30.         <sharedHighlight> <true /> </sharedHighlight>
  31.         <family>0</family>
  32.         <titleWidth>0</titleWidth>
  33.         <icon>0</icon>
  34.         <textAlign>center</textAlign>
  35.         <font>Chicago</font>
  36.         <textSize>12</textSize>
  37.         <textStyle>plain</textStyle>
  38.         <name>Quit</name>
  39.         <script>on mouseUpLinkToQuitend mouseUp</script>
  40.     </part>
  41.     <part>
  42.         <id>2</id>
  43.         <type>button</type>
  44.         <visible> <true /> </visible>
  45.         <reserved5> 0 </reserved5>
  46.         <reserved4> 0 </reserved4>
  47.         <reserved3> 0 </reserved3>
  48.         <reserved2> 0 </reserved2>
  49.         <reserved1> 0 </reserved1>
  50.         <enabled> <true /> </enabled>
  51.         <rect>
  52.             <left>135</left>
  53.             <top>434</top>
  54.             <right>215</right>
  55.             <bottom>465</bottom>
  56.         </rect>
  57.         <style>transparent</style>
  58.         <showName> <false /> </showName>
  59.         <highlight> <false /> </highlight>
  60.         <autoHighlight> <true /> </autoHighlight>
  61.         <sharedHighlight> <true /> </sharedHighlight>
  62.         <family>0</family>
  63.         <titleWidth>0</titleWidth>
  64.         <icon>0</icon>
  65.         <textAlign>center</textAlign>
  66.         <font>Chicago</font>
  67.         <textSize>12</textSize>
  68.         <textStyle>plain</textStyle>
  69.         <name>Help</name>
  70.         <script>on mouseUpLinkToHelpend mouseUp</script>
  71.     </part>
  72.     <part>
  73.         <id>4</id>
  74.         <type>button</type>
  75.         <visible> <true /> </visible>
  76.         <reserved5> 0 </reserved5>
  77.         <reserved4> 0 </reserved4>
  78.         <reserved3> 0 </reserved3>
  79.         <reserved2> 0 </reserved2>
  80.         <reserved1> 0 </reserved1>
  81.         <enabled> <true /> </enabled>
  82.         <rect>
  83.             <left>16</left>
  84.             <top>397</top>
  85.             <right>215</right>
  86.             <bottom>428</bottom>
  87.         </rect>
  88.         <style>transparent</style>
  89.         <showName> <false /> </showName>
  90.         <highlight> <false /> </highlight>
  91.         <autoHighlight> <true /> </autoHighlight>
  92.         <sharedHighlight> <true /> </sharedHighlight>
  93.         <family>0</family>
  94.         <titleWidth>0</titleWidth>
  95.         <icon>0</icon>
  96.         <textAlign>center</textAlign>
  97.         <font>Chicago</font>
  98.         <textSize>12</textSize>
  99.         <textStyle>plain</textStyle>
  100.         <name>Main</name>
  101.         <script>on mouseUpLinkToMainend mouseUp</script>
  102.     </part>
  103.     <part>
  104.         <id>5</id>
  105.         <type>button</type>
  106.         <visible> <false /> </visible>
  107.         <reserved5> 0 </reserved5>
  108.         <reserved4> 0 </reserved4>
  109.         <reserved3> 0 </reserved3>
  110.         <reserved2> 0 </reserved2>
  111.         <reserved1> 0 </reserved1>
  112.         <enabled> <true /> </enabled>
  113.         <rect>
  114.             <left>248</left>
  115.             <top>433</top>
  116.             <right>640</right>
  117.             <bottom>480</bottom>
  118.         </rect>
  119.         <style>transparent</style>
  120.         <showName> <false /> </showName>
  121.         <highlight> <false /> </highlight>
  122.         <autoHighlight> <false /> </autoHighlight>
  123.         <sharedHighlight> <true /> </sharedHighlight>
  124.         <family>0</family>
  125.         <titleWidth>0</titleWidth>
  126.         <icon>0</icon>
  127.         <textAlign>center</textAlign>
  128.         <font>Chicago</font>
  129.         <textSize>12</textSize>
  130.         <textStyle>plain</textStyle>
  131.         <name>Grey Bar</name>
  132.         <script></script>
  133.     </part>
  134.     <part>
  135.         <id>6</id>
  136.         <type>button</type>
  137.         <visible> <true /> </visible>
  138.         <reserved5> 0 </reserved5>
  139.         <reserved4> 0 </reserved4>
  140.         <reserved3> 0 </reserved3>
  141.         <reserved2> 0 </reserved2>
  142.         <reserved1> 0 </reserved1>
  143.         <enabled> <true /> </enabled>
  144.         <rect>
  145.             <left>68</left>
  146.             <top>228</top>
  147.             <right>191</right>
  148.             <bottom>327</bottom>
  149.         </rect>
  150.         <style>transparent</style>
  151.         <showName> <false /> </showName>
  152.         <highlight> <false /> </highlight>
  153.         <autoHighlight> <false /> </autoHighlight>
  154.         <sharedHighlight> <true /> </sharedHighlight>
  155.         <family>0</family>
  156.         <titleWidth>0</titleWidth>
  157.         <icon>0</icon>
  158.         <textAlign>center</textAlign>
  159.         <font>Chicago</font>
  160.         <textSize>12</textSize>
  161.         <textStyle>plain</textStyle>
  162.         <name>GuideLoc</name>
  163.         <script></script>
  164.     </part>
  165.     <part>
  166.         <id>8</id>
  167.         <type>button</type>
  168.         <visible> <true /> </visible>
  169.         <reserved5> 0 </reserved5>
  170.         <reserved4> 0 </reserved4>
  171.         <reserved3> 0 </reserved3>
  172.         <reserved2> 0 </reserved2>
  173.         <reserved1> 0 </reserved1>
  174.         <enabled> <true /> </enabled>
  175.         <rect>
  176.             <left>23</left>
  177.             <top>176</top>
  178.             <right>207</right>
  179.             <bottom>201</bottom>
  180.         </rect>
  181.         <style>transparent</style>
  182.         <showName> <false /> </showName>
  183.         <highlight> <false /> </highlight>
  184.         <autoHighlight> <false /> </autoHighlight>
  185.         <sharedHighlight> <true /> </sharedHighlight>
  186.         <family>0</family>
  187.         <titleWidth>0</titleWidth>
  188.         <icon>0</icon>
  189.         <textAlign>center</textAlign>
  190.         <font>Chicago</font>
  191.         <textSize>12</textSize>
  192.         <textStyle>plain</textStyle>
  193.         <name>Version</name>
  194.         <script></script>
  195.     </part>
  196.     <name></name>
  197.     <script>on cGglobal gCurMovie1put "CG "&the currTime of window gCurMovie1end cGon guideFldsset visible of cd fld "GuideFrames" to not visible of cd fld "GuideFrames"set visible of cd fld "Guides" to not visible of cd fld "Guides"end guideFldson clickInListoid wglobal gCurMovie1spinCursorput selectedLine of window w into theLineput line theLine of cd fld "GuideFrames" into theFramesif theFrames = "" then exit clickInListoidif there is not a window gCurMovie1 then ToggleGuide truespinCursorsend "Pause" to window gCurMovie1put item 1 to 2 of theFrames &",0" into startTset the startTime of window gCurMovie1 to startTput item 3 to 4 of theFrames into endTimeif item 2 of endTime contains "." thenput (char 4 to 5 of item 2 of endTime) into tickSettingput char 1 to 2 of item 2 of endTime into item 2 of endTimeelse put 0 into tickSettingset the startTime of window gCurMovie1 to startTput endTime&"," & tickSetting into newEndTimeset the endTime of window gCurMovie1 to newEndTimespinCursorset the startTime of window gCurMovie1 to startTset the endTime of window gCurMovie1 to newEndTimespinCursorwait 20set the rate of window gCurMovie1 to .1send "Play" to window gCurMovie1set the rate of window gCurMovie1 to 1end clickInListoidon ToggleGuide justPlayglobal gCDVolume6,gGuideState,gCurMovie1,gARPLQTAudio,UserNameif justPlay is not true then put not (gGuideState is true) into gGuideStateput "" into theFramessend "guideName" to this cdput the result into theGuideMoovif number of items of theGuideMoov > 1 thenput item 1 of theGuideMoov into tempdelete item 1 of theGuideMoovput theGuideMoov into theFramesput temp into theGuideMoovend ifif theGuideMoov = "" then exit toggleGuideif gGuideState is true thenspinCursordrawColor "Btn.Guide Off",rect of btn "Guide"if gARPLQTAudio = "" then put 220 into gARPLQTAudioput gCDVolume6&"Stack Data:Guide:"&theGuideMoov into theGuideMoovif there is a  btn "GuideLoc" thenput topLeft of btn "GuideLoc" into theLocelse put topLeft of bg btn "GuideLoc" into theLocif there is not a file theGuideMoov thenput "" into gCurMovie1if userName = "Peter Meyer" thenanswer "‚Äú"& theGuideMoov & "‚Äù was not found."else answer "The Guide movie was not found. Please mount the ARPL CD."exit ToggleGuideend ifput removePath(theGuideMoov) into tempMovie theGuideMoov,"windoid",theLoc,"invisible","floating"if the result is not "" thenanswer the resultexit to HyperCardend ifspinCursorput temp into gCurMovie1set the rate of window gCurMovie1 to .1set the badge of window gCurMovie1 to falseset the closeOnFinish of window gCurMovie1 to falseshow window gCurMovie1if there is a cd fld "Guides" thenput line 1 of cd fld "GuideFrames" into theFramesend ifspinCursorif theFrames is not "" thenput item 3 to 4 of theFrames into endTimeif item 2 of endTime contains "." thenput (char 4 to 5 of item 2 of endTime) into tickSettingput char 1 to 2 of item 2 of endTime into item 2 of endTimeelseput 0 into tickSettingend ifset the startTime of window gCurMovie1 to (item 1 to 2 of theFrames)&",0"put endTime&"," & tickSetting into newEndTimeset the endTime of window gCurMovie1 to newEndTimeend ifspinCursorif there is a cd fld "Guides" thenput cd fld "Guides" into theListif theList is not "" thenif short name of this cd = "Presentation Maker" Thenput "5,179" into theLocelse put "42,64" into theLocListoid "Guide",theList,"Windoid",theLoc,1end ifend ifshow window gCurMovie1send "Play" to window gCurMovie1set the rate of window gCurMovie1 to 1elsedrawColor "Btn.Guide On",rect of btn "Guide"if there is a window gCurMovie1 then close window gCurMovie1if there is a window "Guide" then close window "Guide"end ifend ToggleGuide</script>
  198. </background>
  199.